object frmPlayer: TfrmPlayer Left = 301 Top = 158 BorderIcons = [] BorderStyle = bsNone Caption = 'Diino Player' ClientHeight = 222 ClientWidth = 409 Color = clWhite TransparentColorValue = clFuchsia Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Icon.Data = {} KeyPreview = True OldCreateOrder = False Scaled = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnHide = FormHide OnKeyDown = FormKeyDown OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object lblTime: TspSkinStdLabel Left = 256 Top = 35 Width = 28 Height = 13 UseSkinFont = True UseSkinColor = True DefaultFont.Charset = DEFAULT_CHARSET DefaultFont.Color = clWindowText DefaultFont.Height = -11 DefaultFont.Name = 'MS Shell Dlg 2' DefaultFont.Style = [] SkinData = SkinModule.sdPlayer SkinDataName = 'stdlabel' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Caption = '21:59' ParentFont = False end object lblTrackInfo: TBwLabel Left = 8 Top = 35 Width = 201 Height = 13 AutoSize = False Caption = '01 - Looong artist name - Long long song title' Transparent = True ShortenCaption = True MinimizePath = False end object btnRepeat: TspSkinButton Left = 216 Top = 56 Width = 33 Height = 25 Hint = 'Toggle Repeat' TabOrder = 0 DrawDefault = True SkinData = SkinModule.sdPlayer AreaName = 'repeatarea' SkinDataName = 'repeatoffbutton' AlphaBlend = False AlphaBlendValue = 200 UseSkinCursor = False DefaultFont.Charset = DEFAULT_CHARSET DefaultFont.Color = clWindowText DefaultFont.Height = 14 DefaultFont.Name = 'Arial' DefaultFont.Style = [] UseSkinFont = True DefaultWidth = 0 DefaultHeight = 0 UseSkinSize = True UseSkinFontColor = True RepeatMode = False RepeatInterval = 100 AllowAllUp = False ShowHint = True CanFocused = False Action = acToggleRepeat Down = False GroupIndex = 0 NumGlyphs = 1 Spacing = 1 end object tmPosition: TTimer Enabled = False OnTimer = tmPositionTimer Left = 40 Top = 124 end object TrayIcon: TJvTrayIcon Icon.Data = {} IconIndex = 0 PopupMenu = pmTray Visibility = [tvVisibleTaskBar, tvVisibleTaskList] OnDblClick = TrayIconDblClick Left = 128 Top = 124 end object pmTray: TPopupMenu Left = 164 Top = 128 object miShow: TMenuItem Caption = 'Show Diino Player' OnClick = miShowClick end object miClose: TMenuItem Caption = 'Close Diino Player' OnClick = miCloseClick end end object tmStatusFlash: TTimer Enabled = False OnTimer = tmStatusFlashTimer Left = 12 Top = 124 end object DSF: TspDynamicSkinForm UseFormCursorInNCArea = False MaxMenuItemsInWindow = 0 ClientWidth = 0 ClientHeight = 0 HideCaptionButtons = False AlwaysShowInTray = False LogoBitMapTransparent = False AlwaysMinimizeToTray = False UseSkinFontInMenu = True ShowIcon = False MaximizeOnFullScreen = False SkinHint = SkinHint ShowObjectHint = True UseDefaultObjectHint = True UseSkinCursors = False DefCaptionFont.Charset = DEFAULT_CHARSET DefCaptionFont.Color = clBtnText DefCaptionFont.Height = 14 DefCaptionFont.Name = 'Arial' DefCaptionFont.Style = [fsBold] DefInActiveCaptionFont.Charset = DEFAULT_CHARSET DefInActiveCaptionFont.Color = clBtnShadow DefInActiveCaptionFont.Height = 14 DefInActiveCaptionFont.Name = 'Arial' DefInActiveCaptionFont.Style = [fsBold] DefMenuItemHeight = 20 DefMenuItemFont.Charset = DEFAULT_CHARSET DefMenuItemFont.Color = clWindowText DefMenuItemFont.Height = 14 DefMenuItemFont.Name = 'Arial' DefMenuItemFont.Style = [] UseDefaultSysMenu = True SupportNCArea = False AlphaBlendAnimation = False AlphaBlendValue = 200 AlphaBlend = False MenusAlphaBlend = False MenusAlphaBlendAnimation = False MenusAlphaBlendValue = 200 SkinData = SkinModule.sdPlayer MinHeight = 0 MinWidth = 0 MaxHeight = 0 MaxWidth = 0 Sizeable = False DraggAble = True Magnetic = False MagneticSize = 5 BorderIcons = [] OnMouseUpEvent = DSFMouseUpEvent OnMouseDownEvent = DSFMouseDownEvent OnMouseMoveEvent = DSFMouseMoveEvent OnMouseEnterEvent = DSFMouseEnterEvent Left = 8 Top = 64 end object alPlayer: TActionList OnUpdate = alPlayerUpdate Left = 216 Top = 128 object acPrev: TAction Category = 'PlayControls' OnExecute = acPrevExecute end object acPlay: TAction Category = 'PlayControls' OnExecute = acPlayExecute end object acPause: TAction Category = 'PlayControls' OnExecute = acPauseExecute end object acStop: TAction Category = 'PlayControls' OnExecute = acStopExecute end object acNext: TAction Category = 'PlayControls' OnExecute = acNextExecute end object acToggleMute: TAction Category = 'PlaySettings' OnExecute = acToggleMuteExecute end object acVolumeInc: TAction Category = 'PlaySettings' OnExecute = acVolumeIncExecute end object acVolumeDec: TAction Category = 'PlaySettings' OnExecute = acVolumeDecExecute end object acTogglePlaylist: TAction Category = 'PlaySettings' OnExecute = acTogglePlaylistExecute end object acToggleShuffle: TAction Category = 'PlaySettings' OnExecute = acToggleShuffleExecute end object acToggleRepeat: TAction Category = 'PlaySettings' OnExecute = acToggleRepeatExecute end object acMinimize: TAction OnExecute = acMinimizeExecute end object acChangeVolume: TAction Category = 'PlaySettings' OnExecute = acChangeVolumeExecute end object AcTest: TAction ShortCut = 16468 OnExecute = AcTestExecute end end object SkinHint: TspSkinHint DefaultFont.Charset = DEFAULT_CHARSET DefaultFont.Color = clWindowText DefaultFont.Height = -11 DefaultFont.Name = 'MS Shell Dlg 2' DefaultFont.Style = [] UseSkinFont = True AlphaBlendSupport = True AlphaBlend = False AlphaBlendValue = 200 SkinData = SkinModule.sdDynamic Active = True OnShowHint = SkinHintShowHint Left = 288 Top = 136 end object Boss: TBoss Left = 304 Top = 72 end object tmGraphicsBugFix: TTimer Interval = 2000 OnTimer = tmGraphicsBugFixTimer Left = 24 Top = 160 end end